-- card: 24787 from stack: in -- bmap block id: 0 -- flags: 0000 -- background id: 9521 -- name: LegalJunk ----- HyperTalk script ----- on domenu which --•• Added by Medior, Inc. 8/8/90 if which is in "Home,Quit HyperCard" then global RPStackName if RPStackName is not "" then set cursor to watch put RPStackName into shortName repeat until offset(":",shortName) = 0 delete char 1 to offset(":",shortName) of shortName end repeat delete last char of shortName answer "This will return to "&shortName&"." with "Cancel" or "OK" if it is "Cancel" then exit domenu set cursor to 4 lock screen go RPStackName unlock screen with dissolve fast end if else pass domenu end domenu -- part 1 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=-1 top=38 right=342 bottom=512 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 9 -- style flags: 0 -- line height: 12 -- part name: -- part 4 (field) -- low flags: 01 -- high flags: 2004 -- rect: left=341 top=1 right=58 bottom=511 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 10 -- style flags: 256 -- line height: 13 -- part name: -- part 2 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=1 top=1 right=38 bottom=339 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 256 -- line height: 16 -- part name: -- part 3 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=1 top=0 right=342 bottom=512 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp doMenu "quit hypercard" end mouseUp -- part 5 (button) -- low flags: 00 -- high flags: 2000 -- rect: left=474 top=32 right=56 bottom=504 -- title width / last selected line: 0 -- icon id / first selected line: 1012 / 1012 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Go Back ----- HyperTalk script ----- on mouseUp go back end mouseUp -- part contents for card part 1 ----- text ----- ©1990, Apple Computer, Inc. All rights reserved. Apple, the Apple logo, AppleLink, AppleShare, AppleTalk, A/UX, HyperCard, ImageWriter, LaserWriter, MacApp, Macintosh, and SANE are registered trademarks of Apple Computer, Inc. Apple Desktop Bus, AppleFax, EtherTalk, FDHD, Finder, HyperTalk, LocalTalk, MacinTalk, MacWorkStation, MPW, MultiFinder, QuickDraw, ResEdit, and Switcher are trademarks of Apple Computer, Inc. PostScript is a registered trademark of Adobe Systems, Incorporated. UNIX is a registered trademark of AT&T Information Systems. Claris, MacDraw, MacPaint, and MacWrite are trademarks of Claris Corporation. VAX, VMS, DECnet, and DEC are trademarks of Digital Equipment Corporation. Helvetica and Times are registered trademarks of Linotype Co. Smalltalk-80 is a trademark of ParcPlace Systems. NuBus is a trademark of Texas Instruments. Ethernet is a registered trademark of Xerox Corporation. Mention of products in this directory is for information purposes only and constitutes neither an endorsement nor a recommendation. All product specifications and descriptions were supplied by the respective vendors or developers. Apple Computer, Inc. assumes no responsibility with regard to the selection, performance, or use of the products listed in this directory. All understanding, agreements, or warranties take place directly between the vendors and prospective users. Limits of Liability Apple Computer, Inc. makes no warranties with respect to the contents of products listed in this directory, or the completeness or accuracy of this publication. Apple specifically disclaims all warranties, expressed or implied, including but not limited to, the implied warranties of merchantability and fitness for a particular purpose. -- part contents for card part 2 ----- text ----- Apple Engineering/Scientific Solutions Guide HyperCard Edition - Winter 1989/90 -- part contents for card part 4 ----- text ----- Click anywhere to leave the stack, OR click on the arrow to Go Back.